﻿Imports System

Namespace System.Workflow.ComponentModel.Serialization
    <AttributeUsage(AttributeTargets.Property, AllowMultiple:=False, Inherited:=False)> _
    Public NotInheritable Class ConstructorArgumentAttribute
        Inherits Attribute
        ' Methods
        Public Sub New(ByVal argumentName As String)
            Me.argumentName = argumentName
        End Sub


        ' Properties
        Public ReadOnly Property ArgumentName As String
            Get
                Return Me.argumentName
            End Get
        End Property


        ' Fields
        Private argumentName As String
    End Class
End Namespace

